home *** CD-ROM | disk | FTP | other *** search
/ Resource Library: Multimedia / Resource Library: Multimedia.iso / hypercrd / xcmds / dvlprstc.hqx / Developer Stack 1.3r / background_16981.txt < prev    next >
Encoding:
Text File  |  1991-04-30  |  9.2 KB  |  452 lines
  1. -- background: 16981 from stack: in.3r
  2. -- bmap block id: 17850
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: Quick Ref
  6. ----- HyperTalk script -----
  7. on opencard
  8.   put (the number of this card - the number of first card of this background+1) into field "PageNumber"
  9.   put "Quick Ref" into field "type"
  10.  
  11. end opencard
  12.  
  13.  
  14.  
  15. -- part 1 (field)
  16. -- low flags: 01
  17. -- high flags: 0004
  18. -- rect: left=2 top=3 right=36 bottom=304
  19. -- title width / last selected line: 0
  20. -- icon id / first selected line: 0 / 0
  21. -- text alignment: 0
  22. -- font id: 3
  23. -- text size: 24
  24. -- style flags: 0
  25. -- line height: 32
  26. -- part name: Name
  27.  
  28.  
  29. -- part 11 (field)
  30. -- low flags: 01
  31. -- high flags: 0002
  32. -- rect: left=461 top=14 right=31 bottom=488
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 0 / 0
  35. -- text alignment: 1
  36. -- font id: 3
  37. -- text size: 12
  38. -- style flags: 0
  39. -- line height: 16
  40. -- part name: PageNumber
  41.  
  42.  
  43. -- part 12 (field)
  44. -- low flags: 00
  45. -- high flags: 0007
  46. -- rect: left=59 top=46 right=258 bottom=507
  47. -- title width / last selected line: 0
  48. -- icon id / first selected line: 0 / 0
  49. -- text alignment: 0
  50. -- font id: 3
  51. -- text size: 9
  52. -- style flags: 0
  53. -- line height: 12
  54. -- part name: Reference
  55.  
  56.  
  57. -- part 13 (button)
  58. -- low flags: 00
  59. -- high flags: A003
  60. -- rect: left=413 top=260 right=282 bottom=504
  61. -- title width / last selected line: 0
  62. -- icon id / first selected line: 0 / 0
  63. -- text alignment: 1
  64. -- font id: 0
  65. -- text size: 12
  66. -- style flags: 0
  67. -- line height: 16
  68. -- part name: Find...
  69. ----- HyperTalk script -----
  70. on mouseUp
  71.   if the optionkey is down then pass mouseup
  72.   ask "What do you want to find?"
  73.   if it is empty then exit mouseup
  74.   find it in field reference
  75. end mouseUp
  76.  
  77.  
  78.  
  79. -- part 14 (field)
  80. -- low flags: 01
  81. -- high flags: 0004
  82. -- rect: left=301 top=3 right=36 bottom=437
  83. -- title width / last selected line: 0
  84. -- icon id / first selected line: 0 / 0
  85. -- text alignment: 65535
  86. -- font id: 3
  87. -- text size: 24
  88. -- style flags: 0
  89. -- line height: 32
  90. -- part name: type
  91.  
  92.  
  93. -- part 22 (button)
  94. -- low flags: 00
  95. -- high flags: 2004
  96. -- rect: left=3 top=47 right=90 bottom=50
  97. -- title width / last selected line: 0
  98. -- icon id / first selected line: 11645 / 11645
  99. -- text alignment: 1
  100. -- font id: 0
  101. -- text size: 12
  102. -- style flags: 0
  103. -- line height: 16
  104. -- part name: Return
  105. ----- HyperTalk script -----
  106. on mouseUp
  107.   if the optionkey is down then pass mouseup
  108.   visual effect iris close
  109.   go first card
  110. end mouseUp
  111.  
  112.  
  113.  
  114. -- part 23 (button)
  115. -- low flags: 00
  116. -- high flags: 2004
  117. -- rect: left=3 top=88 right=131 bottom=50
  118. -- title width / last selected line: 0
  119. -- icon id / first selected line: 14767 / 14767
  120. -- text alignment: 1
  121. -- font id: 0
  122. -- text size: 12
  123. -- style flags: 0
  124. -- line height: 16
  125. -- part name: About...
  126. ----- HyperTalk script -----
  127. on mouseUp
  128.   if the optionkey is down then pass mouseup
  129.  
  130.   visual iris open to gray
  131.   visual iris close to black
  132.   visual iris open to gray
  133.   visual iris close
  134.   go background information
  135. end mouseUp
  136.  
  137.  
  138.  
  139. -- part 24 (button)
  140. -- low flags: 00
  141. -- high flags: 2004
  142. -- rect: left=3 top=129 right=172 bottom=50
  143. -- title width / last selected line: 0
  144. -- icon id / first selected line: 29114 / 29114
  145. -- text alignment: 1
  146. -- font id: 0
  147. -- text size: 12
  148. -- style flags: 0
  149. -- line height: 16
  150. -- part name: Back
  151. ----- HyperTalk script -----
  152. on mouseUp
  153.   if the optionkey is down then pass mouseup
  154.  
  155.   visual barn door close to black
  156.   visual barn door open
  157.   pop card
  158. end mouseUp
  159.  
  160.  
  161.  
  162. -- part 25 (button)
  163. -- low flags: 00
  164. -- high flags: 2004
  165. -- rect: left=3 top=170 right=213 bottom=50
  166. -- title width / last selected line: 0
  167. -- icon id / first selected line: 1011 / 1011
  168. -- text alignment: 1
  169. -- font id: 0
  170. -- text size: 12
  171. -- style flags: 0
  172. -- line height: 16
  173. -- part name: Home
  174. ----- HyperTalk script -----
  175. on mouseUp
  176.   if the optionkey is down then pass mouseup
  177.   visual dissolve to black
  178.   visual dissolve
  179.   go first card of home
  180. end mouseUp
  181.  
  182.  
  183.  
  184. -- part 26 (button)
  185. -- low flags: 00
  186. -- high flags: 2004
  187. -- rect: left=3 top=211 right=254 bottom=50
  188. -- title width / last selected line: 0
  189. -- icon id / first selected line: 1000 / 1000
  190. -- text alignment: 1
  191. -- font id: 0
  192. -- text size: 12
  193. -- style flags: 0
  194. -- line height: 16
  195. -- part name: Open Stack
  196. ----- HyperTalk script -----
  197. on mouseUp
  198.   if the optionkey is down then pass mouseup
  199.   put "Please select a stack to open..."
  200.   domenu "open stack..."
  201.   hide message
  202. end mouseUp
  203.  
  204.  
  205.  
  206. -- part 27 (button)
  207. -- low flags: 00
  208. -- high flags: 2004
  209. -- rect: left=3 top=252 right=295 bottom=50
  210. -- title width / last selected line: 0
  211. -- icon id / first selected line: 17343 / 17343
  212. -- text alignment: 1
  213. -- font id: 0
  214. -- text size: 12
  215. -- style flags: 0
  216. -- line height: 16
  217. -- part name: Launch Application
  218. ----- HyperTalk script -----
  219. on mouseUp
  220.   if the optionkey is down then pass mouseup
  221.   visual venetian blinds to gray
  222.   visual venetian blinds to black
  223.   visual venetian blinds to gray
  224.   visual venetian blinds
  225.   go to background "Mini Hyperstation"
  226. end mouseUp
  227.  
  228.  
  229.  
  230. -- part 28 (button)
  231. -- low flags: 00
  232. -- high flags: 2004
  233. -- rect: left=3 top=293 right=336 bottom=50
  234. -- title width / last selected line: 0
  235. -- icon id / first selected line: 21786 / 21786
  236. -- text alignment: 1
  237. -- font id: 0
  238. -- text size: 12
  239. -- style flags: 0
  240. -- line height: 16
  241. -- part name: Menus Off
  242. ----- HyperTalk script -----
  243. on mouseUp
  244.   if the optionkey is down then pass mouseup
  245.  
  246.   if menubar("┬⌐1988SDrazga") then hide menubar else show menubar
  247. end mouseUp
  248.  
  249.  
  250.  
  251. -- part 29 (button)
  252. -- low flags: 00
  253. -- high flags: A004
  254. -- rect: left=61 top=292 right=341 bottom=119
  255. -- title width / last selected line: 0
  256. -- icon id / first selected line: 2 / 2
  257. -- text alignment: 1
  258. -- font id: 0
  259. -- text size: 12
  260. -- style flags: 0
  261. -- line height: 16
  262. -- part name: XFCNs...
  263. ----- HyperTalk script -----
  264. on mouseUp
  265.   if the optionkey is down then pass mouseup
  266.  
  267.   controlButton "XFCNs"
  268.  
  269. end mouseUp
  270.  
  271.  
  272.  
  273. -- part 30 (button)
  274. -- low flags: 00
  275. -- high flags: A004
  276. -- rect: left=124 top=292 right=341 bottom=182
  277. -- title width / last selected line: 0
  278. -- icon id / first selected line: 2 / 2
  279. -- text alignment: 1
  280. -- font id: 0
  281. -- text size: 12
  282. -- style flags: 0
  283. -- line height: 16
  284. -- part name: XCMDS...
  285. ----- HyperTalk script -----
  286. on mouseUp
  287.   if the optionkey is down then pass mouseup
  288.  
  289.   controlButton "XCMDs"
  290.  
  291. end mouseUp
  292.  
  293.  
  294.  
  295. -- part 31 (button)
  296. -- low flags: 00
  297. -- high flags: A004
  298. -- rect: left=188 top=292 right=341 bottom=246
  299. -- title width / last selected line: 0
  300. -- icon id / first selected line: 29007 / 29007
  301. -- text alignment: 1
  302. -- font id: 0
  303. -- text size: 12
  304. -- style flags: 0
  305. -- line height: 16
  306. -- part name: Functions...
  307. ----- HyperTalk script -----
  308. on mouseUp
  309.   if the optionkey is down then pass mouseup
  310.  
  311.   controlButton "Functions"
  312.  
  313. end mouseUp
  314.  
  315.  
  316.  
  317. -- part 32 (button)
  318. -- low flags: 00
  319. -- high flags: A004
  320. -- rect: left=252 top=292 right=341 bottom=310
  321. -- title width / last selected line: 0
  322. -- icon id / first selected line: 1060 / 1060
  323. -- text alignment: 1
  324. -- font id: 0
  325. -- text size: 12
  326. -- style flags: 0
  327. -- line height: 16
  328. -- part name: Scripts...
  329. ----- HyperTalk script -----
  330. on mouseUp
  331.   if the optionkey is down then pass mouseup
  332.  
  333.   controlButton "Scripts"
  334.  
  335. end mouseUp
  336.  
  337.  
  338.  
  339. -- part 33 (button)
  340. -- low flags: 00
  341. -- high flags: A004
  342. -- rect: left=317 top=292 right=341 bottom=375
  343. -- title width / last selected line: 0
  344. -- icon id / first selected line: 27056 / 27056
  345. -- text alignment: 1
  346. -- font id: 0
  347. -- text size: 12
  348. -- style flags: 0
  349. -- line height: 16
  350. -- part name: Buttons...
  351. ----- HyperTalk script -----
  352. on mouseUp
  353.   if the optionkey is down then pass mouseup
  354.   controlButton "Buttons"
  355. end mouseUp
  356.  
  357.  
  358.  
  359. -- part 34 (button)
  360. -- low flags: 00
  361. -- high flags: A004
  362. -- rect: left=381 top=292 right=341 bottom=439
  363. -- title width / last selected line: 0
  364. -- icon id / first selected line: 22999 / 22999
  365. -- text alignment: 1
  366. -- font id: 0
  367. -- text size: 12
  368. -- style flags: 0
  369. -- line height: 16
  370. -- part name: Quick Ref...
  371. ----- HyperTalk script -----
  372. on mouseUp
  373.   if the optionkey is down then pass mouseup
  374.   controlButton "Quick Ref"
  375. end mouseUp
  376.  
  377.  
  378.  
  379. -- part 35 (button)
  380. -- low flags: 00
  381. -- high flags: A004
  382. -- rect: left=446 top=292 right=341 bottom=504
  383. -- title width / last selected line: 0
  384. -- icon id / first selected line: 11645 / 11645
  385. -- text alignment: 1
  386. -- font id: 0
  387. -- text size: 12
  388. -- style flags: 0
  389. -- line height: 16
  390. -- part name: Full Index...
  391. ----- HyperTalk script -----
  392. on mouseUp
  393.   if the optionkey is down then pass mouseup
  394.   controlbutton index
  395. end mouseUp
  396.  
  397.  
  398.  
  399.  
  400. -- part 36 (button)
  401. -- low flags: 00
  402. -- high flags: 2000
  403. -- rect: left=437 top=11 right=33 bottom=459
  404. -- title width / last selected line: 0
  405. -- icon id / first selected line: 1014 / 1014
  406. -- text alignment: 1
  407. -- font id: 0
  408. -- text size: 12
  409. -- style flags: 0
  410. -- line height: 16
  411. -- part name: Prev
  412. ----- HyperTalk script -----
  413. on mousestilldown
  414.   global scrolling
  415.   put true into scrolling
  416.   goPrev
  417. end mousestilldown
  418.  
  419. on mouseup
  420.   global scrolling
  421.   if not scrolling then goPrev
  422.   put false into scrolling
  423. end mouseup
  424.  
  425.  
  426.  
  427. -- part 37 (button)
  428. -- low flags: 00
  429. -- high flags: 2000
  430. -- rect: left=488 top=11 right=33 bottom=510
  431. -- title width / last selected line: 0
  432. -- icon id / first selected line: 1013 / 1013
  433. -- text alignment: 1
  434. -- font id: 0
  435. -- text size: 12
  436. -- style flags: 0
  437. -- line height: 16
  438. -- part name: Next
  439. ----- HyperTalk script -----
  440. on mousestilldown
  441.   global scrolling
  442.   put true into scrolling
  443.   goNext
  444. end mousestilldown
  445.  
  446. on mouseup
  447.   global scrolling
  448.   if not scrolling then goNext
  449.   put false into scrolling
  450. end mouseup
  451.  
  452.